From 8f44a6559968d3951c6818e4b72a1cd3bef316b2 Mon Sep 17 00:00:00 2001 From: Eli Zaretskii Date: Sun, 28 Sep 2003 08:30:20 +0000 Subject: [PATCH] (Man-default-man-entry): Remove the leading `*' from the word at point. --- lisp/man.el | 3 +++ 1 file changed, 3 insertions(+) diff --git a/lisp/man.el b/lisp/man.el index 075c38866fb..4a768e1effb 100644 --- a/lisp/man.el +++ b/lisp/man.el @@ -572,6 +572,9 @@ This guess is based on the text surrounding the cursor." (setq word (buffer-substring-no-properties start (point)))) (if (string-match "[._]+$" word) (setq word (substring word 0 (match-beginning 0)))) + ;; If looking at something like *strcat(... , remove the '*' + (if (string-match "^*" word) + (setq word (substring word 1))) ;; If looking at something like ioctl(2) or brc(1M), include the ;; section number in the returned value. Remove text properties. (concat word -- 2.30.2